Top 10k strings from Peloponnesian War (1982)(MC Lothlorien).z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /
Back to the directory listing
4 T(X)=T(X)*.7 4 S(X)=S(X)*.8 4 S(X)=S(X)*.7 3 T(X)=T(X)*.9 2 Y(Q)=Y(Q)-1 2 TS=TS-(FS/6 2 TA=TA-(S(X)/9 2 TA=TA-(S(X)/5 2 TA=TA-(AF/6 2 T(X)=T(X)*.8 2 ;"GENERALS"; 2 ;"ENVOYS"; 2 ;"COMMANDER(1-3)?" 1 |~@<|<BB~<><B 1 Z=Z-(T(X)/18 1 Z=Z+(TA*10 1 Z=Z+(T(N)/2 1 Z;" ";T$(1 1 Z(S)=Z(S)-1 1 Z(G)=Z(G)-1 1 Y(E)=Y(E)-1 1 TS=TS-(S(X)/9 1 TS=TS-(S(X)/6 1 TS=TS-(FS/9 1 TS=TS-(FS/8 1 TA=TA-(AF/9 1 TA=TA-(AF/8 1 T(X)=T(X)*.75 1 S(X)=S(X)*.75 1 S(X)=S(X)*.65 1 R=(Y(Q)*(( 1 PELOPONNES 1 P=P-(T(X)/18 1 P=P+(T(N)/2 1 P;" OTHER TROOPS AND MUST DECIDE HOW TO SPLIT THESE AMONGST PELTASTS,ARCHERS AND CAVALRY." 1 I=I-(T(X)/9 1 I=I-(T(X)*.2 1 I=I+(TS*15 1 I=I+(T(N)/2 1 HOPLITESOTHERS TRIREMES 1 H=H-(T(X)/9 1 H=H-(T(X)/8 1 H=H-(T(X)*.2 1 H=H+(TS*10 1 H=H+(T(N)/2 1 H;" ";T$(1 1 H+I<(P+Z)*1.5 1 F;" PELTASTS"; 1 D;" CAVALRY" 1 B|@BBBRR|< 1 B@@BBBbb@@ 1 B;" ARCHERS"; 1 ARGOS CORCYRA CORINTH ELIS MANTINEAMEGARA PLATAEA POTIDAEASYRACUSETHEBES 1 ALCIBIADES DEMOSTHENESCONON 1 @~~<@<BB~<>BB 1 @@@B@BFF@B 1 ;N$(X);" REMAINS NEUTRAL" 1 ;N$(X);" HAS ROUTED THE SPARTANSAND JOINED YOU." 1 ;N$(X);" HAS JOINED/REMAINS IN YOUR ALLIANCE." 1 ;N$(X);" HAS JOINED SPARTA." 1 ;N$(X);" HAS JOINED SPARTA AND DEFEATED YOUR FLEET" 1 ;N$(X);" HAS DEFEATED YOUR FLEETAND JOINED SPARTA" 1 ;N$(X);" HAS DEFEATED YOU AT SEAAND JOINED SPARTA." 1 ;N$(X);" HAS DEFEATED YOU AND JOINED SPARTA" 1 ;N$(X);" HAS BEEN DEFEATED AND FORCED TO JOIN THE SPARTANS." 1 ;N$(X);" HAS BEATEN THE SPARTANSAND CONFIRMS YOUR ALLIANCE." 1 ;N$(X);" HAS BEATEN THE SPARTAN FLEET AND JOINS/REMAINS IN YOUR ALLIANCE" 1 ;N$(X);" BECOMES/REMAINS YOUR ALLY.YOU HAVE JOINTLY DEFEATED THE SPARTANS" 1 ;N$(X);" AND SPARTA HAVE JOINED FORCES AND DEFEATED YOU." 1 ;E$(Q);" HAS BEEN TORTURED.";N$(X);" HAS JOINED SPARTA." 1 ;A$(N);" " 1 ;"YOUR JOINT FLEET IS BEATEN.";N$(X);" HAS JOINED SPARTA." 1 ;"YOUR COMBINED ARMIES HAVE BEEN DEFEATED. ";N$(X);" HAS JOINED SPARTA." 1 ;"YOU HAVE DEFEATED ";N$(X);" AND THEY HAVE JOINED YOUR ALLIANCE." 1 ;"YOU HAVE DEFEATED ";N$(X);" AND THE SPARTANS.";N$(X);" HAS JOINEDYOU." 1 ;"YOU HAVE "; 1 ;"YOU ARE VICTORIOUS ";N$(X);" 1 ;"YEAR ";Y;" BC."; 1 ;"WILL SUPPLY"; 1 ;"WHO?(1-4)" 1 ;"SPARTANS"; 1 ;"SEND:1.AN ENVOY"; 1 ;"SCORE="; 1 ;"PRESS A KEY" 1 ;"PLEASE REFER TO THE WRITTEN 1 ;"PELTASTS?" 1 ;"HOW MANY SHIPS?" 1 ;"HOW MANY MEN?" 1 ;"ENTER LEVEL(1,2 OR 3)" 1 ;"DISPLAY:1.ATHENS"; 1 ;"COUNTER-MEASURES:"; 1 ;"COPYRIGHT - M.C.LOTHLORIEN 1982"; 1 ;"CAVALRY"; 1 ;"ATHENS HAS: "; 1 ;"ATHENIANS" 1 ;"ARCHERS?" 1 ;"ANOTHER GAME(Y/N)?" 1 ;"5.COMMIT YOUR TROOPS TOA FINAL BATTLE WITH SPARTA" 1 ;"4.PASS ANOTHER YEAR"; 1 ;"3.OTHER STATES"; 1 ;"3.A FLEET(20-"; 1 ;"2.SPARTA"; 1 ;"2.AN ARMY(500-"; 1 3333))+H*.3 1 )="TRIREMES" 1 )="THEBES" 1 )="SYRACUSE" 1 )="POTIDAEA" 1 )="PLATAEA" 1 )="PERICLES" 1 )="OTHERS" 1 )="NICIAS" 1 )="MEGARA" 1 )="MANTINEA" 1 )="LYSANDER" 1 )="HOPLITES" 1 )="GYLIPPUS" 1 )="DEMOSTHENES" 1 )="CORINTH" 1 )="CORCYRA" 1 )="CALLICRATIDAS" 1 )="BRASIDAS" 1 )="ARCHIDAMUS" 1 )="ALCIBIADES" 1 )="AGESILAUS" 1 )<(L+T(X))*(( 1 ))-(Z(G)*( 1 ))-(Y(E)*(( 1 (M+T(X))*(( 1 (AF+S(X))*(( 1 ((Z+W+V+U)/240 1 ((FS+S(X))*(( 1 "YOU HAVE BEEN DEFEATED AND WILL NOW BE RULED BY SPARTA." 1 "SPARTA HAS: "; 1 "SPARTA HAS SENT AN ARMY OF ";L;" MEN UNDER ";G$(G);" TO 1 "SPARTA HAS SENT A FLEET OF ";FS;" TRIREMES UNDER ";G$(G);" TO ";N$(X) 1 "SPARTA HAS SENT ";E$(E);" AS AN ENVOY TO ";N$(X) 1 "SPARTA HAS DECIDED TO LAUNCH HERFINAL ATTACK..." 1 "PELOPONNESIAN WAR"; 1 "OTHER STATES"; 1 "OPTIONS"; 1 "CONGRATULATIONS.YOU HAVE WON THEWAR AND ARE NOW UNDISPUTED RULERIN GREECE." 1 JOINS/STAYS IN YOUR ALLIANCE" 1 ARCHIDAMUS CALLICRATIDAS 1 AGESILAUS LYSANDER BRASIDAS GYLIPPUS